Ws-Perform-Sign-In names a function, with lambda list (CLIENT &OPTIONAL (USER *USER*)):
Perform signing in USER on CLIENT and side-effects.
Calls TOOTSVILLE WS-SIGN-IN-USER and TOOTSVILLE WS-KICK-OTHER-STREAMS-FOR-USER
Sends logOK message,and Toots List
Defined in file src/websockets.lisp.